home *** CD-ROM | disk | FTP | other *** search
/ Mesolore / Mesolore - Disc 2.iso / mac / data / Nuttall.dir / 00018_Script_Nav(scroll) Codex Left < prev    next >
Text File  |  2001-01-30  |  378b  |  18 lines
  1.  
  2. on mouseDown
  3.   global cdxScroll
  4.   --  GenLeaveCdx
  5.   
  6.   set cdxScroll = TRUE
  7.   set ctr = 1
  8.   set sprNum = the clickOn
  9.   set cNum = integer(char 2 of the frameLabel)
  10.   repeat while (the mouseDown and the type of sprite sprNum <> 0) or ctr = 1
  11.     goto (the frame + 1)
  12.     set ctr = ctr+1
  13.   end repeat
  14.   setTextRow
  15.   set cdxScroll = FALSE
  16.   --- GenEnterCdx
  17.   
  18. end